home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 85 / CD-ROM 85 / CD-ROM 85.iso / aplic / 2sync / 2SyncSetup.exe / graphics / scripts / DefineSprite_380 / frame_3 / DoAction.as
Encoding:
Text File  |  2002-03-20  |  944 b   |  36 lines
  1. if(eval("_level0:rp_module") eq "mt")
  2. {
  3.    rp_module = "mt";
  4. }
  5. else
  6. {
  7.    rp_module = "mc";
  8. }
  9. x = "1";
  10. n = "1";
  11. setProperty("popupmenu/popupentry", _visible, "0");
  12. while(eval("_level0/data:totalmy") >= n)
  13. {
  14.    if(rp_module ne eval("_level0/data:my" add n))
  15.    {
  16.       set("popupmenu:depth",eval("popupmenu:depth") + "1");
  17.       duplicateMovieClip("popupmenu/popupentry","popup" add n,eval("popupmenu:depth") + "10000" + 16384);
  18.       setProperty("popupmenu/popup" add n, _Y, (x - "1") * "30");
  19.       tellTarget("popupmenu/popup" add n add "/popupoption")
  20.       {
  21.          skip = "1";
  22.          set("../:iam",eval("_level0/data:my" add eval("../../../:n")));
  23.          gotoAndStop(eval("../../../:n") + "1");
  24.       }
  25.       x += "1";
  26.    }
  27.    else
  28.    {
  29.       option = eval("_level0/data:my" add n);
  30.    }
  31.    n += "1";
  32. }
  33. setProperty("popupmenu/popTp", _visible, "0");
  34. setProperty("popupmenu", _visible, "0");
  35. stop();
  36.